﻿Namespace form
    Public Class FormBase
        Protected Overrides Function ProcessDialogKey(ByVal keyData As System.Windows.Forms.Keys) As Boolean
            If keyData = Keys.Escape Then
                Me.Close()
            End If
            Return MyBase.ProcessDialogKey(keyData)
        End Function
    End Class
End Namespace
